home *** CD-ROM | disk | FTP | other *** search
/ Express Pd: GALORE / Express Pd Galore - The Amiga PD & Shareware CD (1994)(Express Pd)[!][Amiga-CD32-CDTV].iso / 3.0 / rexxc / ep_ejectmodule.dopus < prev    next >
Text File  |  1993-12-27  |  265b  |  17 lines
  1. /* EaglePlayer - Eject Module (C) DEFECT */
  2.  
  3. address 'rexx_EP'
  4.  
  5. options results
  6. status G fil
  7.  
  8. if result == "no" then do
  9.     address 'DOPUS.1'
  10.     toptext 'Eagleplayer: No Module loaded !'
  11. end
  12. else do
  13.     eject
  14.     address 'DOPUS.1'
  15.     toptext 'Eagleplayer: Module ejected !'
  16. end
  17.